home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-13 / amac44b.zip / QLST@F2.QM < prev    next >
Text File  |  1992-05-27  |  2KB  |  36 lines
  1. *                               qlst@f2.qm
  2. *               Macro To Load a File List of Files In Ring
  3. *                                 5/18/92
  4.  
  5. * 
  6. * ----------------------------------------------------------------------
  7. * @(f2) Load File List In Ring,
  8. *       User Selects File To Load Emulating PC Magazine Filectrl.com,
  9. *       Loads Only First File In Ring
  10. * ----------------------------------------------------------------------
  11.  
  12.  
  13.  
  14. @f2     macrobegin
  15. * --------------------- Load First File In Ring ---------------------*
  16.         markline copy               * Copy first file name to scrap
  17.         horizontalwindow            * Open 2 windows
  18.         editfile paste return       * Load first file in list in window 2
  19.         prevwindow                  * Move to window 1
  20. * ------------------- Select Another File To Load -------------------*
  21.     SELECT:
  22.         pause                       * Pause to select file to load
  23.         markline copy               * Copy selected file name to scrap
  24.         nextwindow                  * Move to window 2
  25.         editfile paste return       * Load selected file
  26.         zoomwindow                  * Zoom to edit in full window
  27.         pause                       * Press <enter> to Select another file
  28.         prevwindow                  * Return to list to select another file
  29.         makectrofscreen             * To view files above and below cursor
  30.     jump SELECT                     * Loop again to select another file
  31. *
  32. * 31 bytes Thu  05-09-1991  16:25:46 (TH @0, from RINGnn.QM)
  33. * 25 bytes Wed  05-06-1992  13:00:10 (TH @f2, removed Nul)
  34.  
  35.  
  36.